
 
 N u m e r i c   C o m P o r t   =   9 
 
 N u m e r i c   B a u d s   =   1 0 0 0 0 0 0 
 
 
 
 N u m e r i c   F r e q   =   1 5 0 0 0 
 
 N u m e r i c   D u t y   =   4 0 
 
 
 
 S e n d C o m m a n d 
 
 
 
 B u t t o n   1   L a b e l   F r e q + 
 
 B u t t o n   2   L a b e l   F r e q - 
 
 
 
 B u t t o n   4   L a b e l   D u t y + 
 
 B u t t o n   5   L a b e l   D u t y - 
 
 
 
 S t o p 
 
 
 
 L a b e l   E v e n t S t o p 
 
 	 D u t y   =   0 
 
 	 S e n d C o m m a n d 
 
 E n d 
 
 
 
 L a b e l   F r e q + 
 
 	 F r e q   =   M i n ( F r e q   +   5 0 0 ,   2 5 0 0 0 ) 
 
 	 S e n d C o m m a n d 
 
 R e t u r n 
 
 L a b e l   F r e q - 
 
 	 F r e q   =   M a x ( F r e q   -   5 0 0 ,   5 0 0 0 ) 
 
 	 S e n d C o m m a n d 
 
 R e t u r n 
 
 
 
 L a b e l   D u t y + 
 
 	 D u t y   =   M i n ( D u t y   +   5 ,   7 0 ) 
 
 	 S e n d C o m m a n d 
 
 R e t u r n 
 
 L a b e l   D u t y - 
 
 	 D u t y   =   M a x ( D u t y   -   5 ,   0 ) 
 
 	 S e n d C o m m a n d 
 
 R e t u r n 
 
 
 
 L a b e l   S e n d C o m m a n d 
 
 	 C O M   O p e n   C o m P o r t   B a u d s 
 
 	 C O M   W r i t e S t r i n g   " O P T I O N S   "   +   F r e q   +   "   "   +   D u t y   +   C R L F 
 
 	 C O M   C l o s e 
 
 	 P r i n t   F r e q   +   "   "   +   D u t y   
 
 R e t u r n 
 
 
 
 
 
 ' B O O K M A R K S   
 
 
 
 ' E D I T E D L I N E S   4   1 0   9   1 0   1 5   1 0   2 0   1 0   2 6   1 0   3 1   1 0   
 
 
 
 ' W A T C H   v 1 
 
 ' E X E C   D e s t X   =   1 2 
 
 